LLLLLLLLLLLLLLL 
LLLLLLLLLLLLLLL 
LLLLLELLLLLLLLLL 


RRRRRRRRRRRR 
RRRRRRRRRRRR 
RRRRRRRRRRRR 
RRP RRR 
RRR RRR 
RRR RRR 
RRR RRR 
RRR RRR 
RRR RRR 
RRRRRRRRRRRR 
RRRRRRRRRRRR 
RRRRRRRRRRRR 
RRR = RRR 

RRR R 

RRR = RRR 

RRR RRR 
RRR RRR 
RRR RRR 

RR RRR 
RRR RRR 
RR RRR 


, 


tad 
nm 


gessessessassaeans | s 


RMMVINMNVVVNVNNNNMNNNNNNN 


: 
00 
3 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
09 
00 
00 
00 
00 


WABAAAMAHMMAAARAHH 


Sin Si Si Se i fe | 
ia Ine Bon ne ne ad a 


**F ILE**1D**LBR 
LL BBBBBBBB RRRRRRRR 
LL BBBBBBBB RRRRRRRR 
LL +4 BB RR RR 
LL BB RR RR 
LL 8B BB RR RR 
LL BB BB RR RR 
LL BBBBBBBB RRRRRRRR 
LL RRRRRRRR 
LL BB 8B RR RR 
LL BB BB RR RR 
LL BB BB RR RR eeee 
LL BB BB RR RR eeee 
LLLLLLLLLL 88888888 RR RR eos 
LLLLLLLLLL 88886888 RR RR eeee 
MM MM DDDDDODD LL 
MM MM DDDDDDDD LL 
MMMM MMMM 6DD DD LL 
MMMM MMMM DD DD LL 
MM 66MM OMM «ODD DD LL 
MM 66MM UMM «ODD DD LL 
MM MM DD DD LL 
MM MM DD DD LL 
MM MM DD DD LL 
MM MM DD DD LL 
MM MM DD DD LL 
MM MM DD DD LL 
MM MM DDDDDDDD LLLLLLLLLL 
MM MM DDDDDDDD LLLLLLLLLL 


ewe — ss cr 


1 
LBR.MDL;1 16-SEP-1984 16:38:25.9 Page 1 


LBR 
Version ‘v04-000' 


—MARAAARBRAAAAAAAAALALLALALALALEALAL ELE LES EAL AAR ERE AREER EERE LEER ERLE SRR R RR RSE SD 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED 


-® ® 
** ® 
:@ ® 
al ® 
-@ ® 
;* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
is ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
is INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER + 
* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
;* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
s® TRANSFERRED. * 
-* ® 
j# THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
;® AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT ®* 
;* CORPORATION. . 
:* ® 
:* ® 
-* *® 
:@ ® 
** *® 
-@ ® 


DIGITAL ASSUMES NO RFSPONSIBILITY FOR THE USE OR > * ila OF ITS 
SOFTWARE ON EQUIPMEP WHICH IS NOT SUPPLIED BY DIGITAL 


TEP IP PIII PTT rrr itiii iii iii iiiiiiiitiiiiiiigy 
MODIFIED BY: 


v03-003 JwT0086 eogue 11-Jan-1983 
Add new sanity ig! 4. DCX data-reduced Libraries. 


v03-002 JwT0062 Jim Teague 25-0c t-1982 
Add expand/compress descriptor to context block. 


v03-001 JwT0056 Jim Teague 20-Sep-1982 
Add structures for implementation of DCX data 
reduction and expansion. 


v02-017 PCG0005 Peter George 07-Jan-1982 
Add flag bit CTX$V_OUTPUTHLP. 
Update major and minor ids. 


v02-016 PCG0004 Peter George 10-Dec-1981 
Correct length calculations. 

v02-015 €G0003 Peter George 10-Dec-1981 
Add HPDSL _LENARRAY. 

v02-014 RPGO014 Bob Grosso 02-Dec-1981 
Support adjacent allocation of cache header blocks. 

v02-013 RPGOO13 Bob Grosso 14-Aug-1981 


Support lower case keywords 
v02-012 PCG0002 Peter George 10-Aug-1981 


—————————————— 
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v02-011 


v02-010 


v02-009 


v02-008 


v02-007 


v02-006 


v02-005 


v02-004 


v02-003 


v02-002 


v02.01 
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Correct the value of the HLPSC_FACILITY constant. 


RPGO0041 Bob Grosso 30-Jul-1981 
Add sanity code for V3 Libs. 


RPGOO038 Bob Grosso 17-Jul-1981 
Add padding in Library header. 


RPGO037 sso 18-Jun-1981 
Change Lhd$l_*luhrec to thaen stahres. 


nnqooss Bob Grosso 12-Jun-1981 
Bump minorid for /HIST changes 


PCG0001 Peter George 08-May-1981 
Add LBRSOUTPUT_HELP definitions. 


RPGOO35 Bob Gro 20-Apr-1981 
Replace Lhd$l gwents with thdSw. slanerver and Lhd$w_spareword. 
Remove Luh$c_dp_* 


RPGO032 Bob Grosso 10-Apr-1981 
More definitions for LUH. 

RPG0027 Bob Grosso 26-Mar-1981 
Add library update history definition. 


RPGOO17 Bob Gro 26-Feb-1981 
Add idxse rfaplsbyt, the on th in an index entry of the 
rfa plus Ehe keyname Length 
Add idd$v_varlenidx to flag ser labie length keyname storage. 


RPGOO11 Bob Grosso 19-Jan-1981 
Add hivbn to context block to record the highest VBN in 
the cache. 


4J0003 Herb Jacobs eis 
Fix syntax of Vifield) definition of og FLags 


Librarian internal context control block 


SSTRUCT 
F 
F 


F 
Vv 


CTX 

ISI ,W ; ISI for Library when open 
IFI,W 3; IFI for Library when open 
CTLLG.L : Control flags 

LIBOPN ; Library is open 

LKPDON ; Lookup was one 

REPROG ; Replace in progre 

HDRDIRTY 3; Header has been nodified 
MHDOUT 3; Module header needs to be written 
OLOLIB ; Library is old (VMS R1) format 
FOUND 1 3; Found match in Lente ET_INDEX 
RONLY 3; Library is read only 


2 


eee eee eee eee eee eeeeeaane 


AAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOOAN 
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OUTPUTHLP 


L 
RPHASHf,L 
RPLDESC.L 


L 
APNEWTXT.B,6 
DLTXTRFA.B.6 


LKS,L 
NXTPUTRFA.B.6 
HIVBN,L 
CHDALLSIZ,L 
CHDALLADR.L 
CHDALLBLK,7 
DCXCTX,L 


DCXMAPDSC,L 
 eeemeen 


OMAR AAA HHT 
Zz 
m 
> 
_ 


*L.9 
CENGTH 


be) elie Be es Bes a] 


> Library header (VBN 1 of the library) 


$STRUCT LHD 


TYPE ,B 
NINDEX,B 


ow, 
SANITY,L 
< 


ona 


ann 
=z bh ~~ 
zo 2 


” 
F LBRVER,T,32 
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LBRSGET_HELP treats ‘‘HELP’’ keyword as normal keyword 
Only LBRSOUTPUT_HELP sets and clears this flag 


Listhead of index cache List 

RAB address for record 1/0 

Pointer to hash table for deleted symbols 
String descriptor for keyname 

of key being replaced 

RFA of new text for replaced key 

RFA of text to delete (replace) 

RFA of end of module (VMS R1 Library) 
RFA of next LBRSGET_RECORD 

Address of internal record buffer 
Address of block buffer 

VBN of first block in buffer 

Number of blocks in the buffer 

RFA for next sequential PUT 


Spare 

Highest VBN in cache 

size in bytes left in block for cache header entry allocation 
address of block for cache header entry allocation 


Number of blocks for initial allocation 


DCX context longword 

Pointer to DCX map descriptor 
Descriptor for expanding/compressing 
Second lword of rec desc 

Spares 


Type of Library 
Number of indices 
Reserved word 

ID for sanity check 


ID for sanity check : : 
ID for sanity check for V3 Libraries 
ID for sanity check for DCX Libraries 


Library format level major id 
Library format level minor id 


Major id level 
Minor id level 
Changed to 2 for Update History Changes 


3; ASCIC version of Librarian 
that created library 


LB 


POON NN NNN 


Be 
- 


i 
(ve) 
Pr 


CREDAT,L 
GPDTIM,L 
ArDUS?.8,1 
IDXBLKF ,W 
CLOSERROR .W 
CORRUPTED 57005 


SPAREWORD ,W 
FeeENen’e 


QnaATn ATA 


IDXOVH,L 
MAXLUHREC ,W 
NUMLUHREC ,W 
BEGLUHRFA,B,6 


ENDLUHRFA,B,6 
DCXMAPVBN,L 


L,1 
{DXDESC 


Ua i Done Bee Re De I Bes Bn Bas ne Bens Bee Dns Bene Bens Ben Bes Bes es Be 
i=] 
oO 
2 
> 
rc 


; Index descriptors in header 


SSTRUCT IDD 

F FLAGS ,W 

Vv <M 
ASCII 
LOCK 
VARLENIDX 


UPCASNTRY 
KEYLEN,W 
VBN,L 
LENGTH 


aca 


Sete Ge Ge Ge Ge Ge Ge Ge Ge Ge Se Ge Ge Se Ge Ge Se Se Ge Ge Ge Ge 
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Creation date/time 
Date/time of Last update 
Size in bytes of additional 


module header data 
Number of disk blocks in index segment 


pares 
Toggle during Library close to trap an interupted write. 


"“"EXDEAD"’ 


eere 
VBN of ist deleted block 
Number of deleted blocks 
Next free spot for data puts 
Next free VBN for alloc _block 
Number of free pre-allocated index blocks 
Listhead for pre-allocated index blocks 
VBN of highest pre-allocated index block 
VBN of highest pre-allocated block in use 
Number of index blocks in use 
Number of index entries (total) 
—- of entries in index 1 (module name 

pare 
Number of module headers in Library 
Number of overhead index pointers 
Max number of update history records. 

If zero then Lib won't have history 
Count of history records. 
RFA of be waatog of wrenery 
RFA of end of Library update history 
VBN of DCX map (if in reduced format) 


pares 
Start of index descriptors 


Flags longword 


Keys are ASCII if 1 

Index is locked from modification 

Index entries have variable length 

Do not upcase match keyword on search com 
Don't upcase keyword on entry 


Upcase the index entry when comparing against a match keyword 


Total length of key 
VBN of first block of index 


s) 


pare 
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: Index block structure 


SSTRUCT INDEX 


Ff USED.W ; Total bytes in use 

F PARENT ,L ; VBN of parent index 

F B,6 3; Reserved 

L ENTRIES : Start of index entries 

: 78.5 3; (Index entry space) 
BLKSIZ,500 ; Maximum useable index space 

L LENGTH ; Length of entire block (512) 


; Entry in an index (binary) 


SSTRUCT IDX 
RFA,B,6 
VBN,0,L 
OFFSET, 4,W 
LENGTH 


RFA of text (or index) 
VBN of RFA 
Offset to byte of RFA 


“Zr-wwn 


KEYID,L 
: Entry in an index (ASCII) 


P 1 

f KEYLEN,B 3; Length of ASCII keyname 

L RFAPLSBYT 5 Lengsh of rfa plus the Length byte 
: KEYNAME ,T,0 ; ASCII keyname 


: Format of RFA disk pointer 


| 

Binary keyID 

SSTRUCT RFA | 
! 

| 


F VBN,L ; Virtual block number in file 
: OF FSET.W 3; Byte offset within block 

INDEX .65535 ; Offset = FFFF indicate index 
L LENGTH ; Length of RFA pointer 


: Data block structure 


LBR.MDL;1 


SSTRUCT DATA 


F RECS,B 
F 8B 

F LINK,L 
L DATA 

F -B,506 
t LENGTH 


; Disk block cache List entry 


SSTRUCT CACHE 

F LINK,L 

F 

F ADDRESS. L 
F FLA GS,W 


DIRTY 
DATA 


> 
LENGTH 


mre 


: Cache entry for replace key List 
SSTRUCT RKB 


KEYLEN,W 
oW 


KEYADOR,L 
KEYNAME ,T,0 
LENGTH 


as] patina Ina ina nan na in 


; Update history List 


$STRUCT LUH 


" 1 

F NXTLUHBLK,L 
F SPARE ,W 

L DATA 

F -B,506 

L LENGTH 

P 1 
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Number of records in this block 
Spare 

Link to next block 

Start of a area 

Data are 

Length of data block 


Link to next eetry or 0 
VBN of index b 

Address of block in memory 
Flags 


True if this block modified 
Data block as opposed to index block 


Length of one entry 


Link in hash bucket 

Index number symbol -. in 

ID of ney (binary ity 

Length of keyname (ASCI keys) 

Upper word of first lw of Jescripter 
Pointer to = y 

Start of may ne 

Length of f sea | pert of block 


VBN of next block or 0 if Last 
spare word 

Begin data area for LUH records 
Room for LUH records 

Length of a block for LUH storage 


———— | 
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oran 


C 


<u“ 


Ss Bens Bena Iona ena Bena Bena en ee Bene ne ne ne ne ne 


RECHDR ,W 
RECLEN,W 
RECHDRLEN 


< 
RECHDRMRK , 43962 
DATFLDLEN, 506 


> 


SSTRUCT HLP 


< 
MAKRECSIZ.60 


HLPFLAGS,L 
USERFLAGS, .W 


UNOHLP 
UKEYLIN 
sotneare 
LBRFLAGS, ,W 
<M 


R 
READRFA.B.6 
LSTKEYRFA.B,6 


: Data structures for help processing 
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Mark beginning of new record 

Length of update history record 

Size of header field 

<x" A‘ 

(512 = 6) bytes are used for data 

see LBRUSR.MDL for LBRSC_MAXLUHLEN,1024 


Maximum Length of help record Line 


Flags for help presene ss 
Flags user will see when called to print Line 


No help text was found 
Line contains keyname 
Line is part of other info 


Flags used internally by help processor 


Line contains a qu 
Processing ‘‘HELP KEY 
Help text was found ( 

eos was seen (%X'40000 


Buffer descriptor 


“f 
10000000") 


oe 

~~ 

~ 
vem wn verve 
=< O-- x 


Pointer into buffer 

Number of characters in buffer 
Current hep leve 

Help level last looked at 

Current tab index 

Width of output Line 

Address of found keys descriptors 
Number of ‘‘real”’ keys passed 

Number of key! partial matches found 
String descriptor for 1st partial match 
RFA of Ist pors7es match module 

RFA of ist level 2 key within module 
Bitvector of wild flags (64 bits) 
Status from last read operation 
Address of current reading rfa 

RFA of last key found 


SIZE 


< 

OUTROUT, 
OUTWIDTH, 
tat? pt 


: Help control flags 


SSTRUCT KCF 


<vur " "Zz 


1 
USERLIB,L 
PROMPT ,L 
(race 


NFO 
BACKUP 

<HCF SM 
NOPROMPT, -1 
> 
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i; Length of block 


; First parameter 

recone parameter 

Third parameter 

Fourth parameter 

Fifth parameter 

Sixth pacaneter 

Number of LbrSoutput_help parameters 
No. of characters to indent per level 
Maximum number of keys 

Number of bytes in topic prompts 
Maximum Line width 

Size ef a@ page 

Facility code 118 * 65536 

Default Listing width 

Maximum Listing width 

Width of logical tab for Listing keys as found 
Width of logical tab 


be 


MON—WMo 


o 


AON ON SOO Wh 


a 


Offset to info block pointer 

; Offset to Line width 

; Offset to user routine address 

; Offset to user data address 
Offset to key! descriptor 


Mw 
Sete Seeee 


User library flags 
Prompting flags 


Continue with prompting 

Stay at same prompting level 

More information is available 
Some information was printed 

Backing up a prompt level 


; Prompting turned off 


11 
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; Current Library indices 


SSTRUCT HLI 


MAININDEX,L ; Main Library (/LIB) index 
a LASTINDEX,L ; Last Library opened index 
a LASTNUMB,L 3; Last tor ery opened number, relative to 
3; user specified default Libraries 
t LENGTH 


: Output driver print data 


SSTRUCT HPD 


i 1 
F SUBPMTPTR,L ; Ptr used for fg te subprompt buffer 
f SUBPMTLEV,L ; Current prompt leve 
F OUTPUTROU, ; User specified output routine 
F LENARRAY,L ; Address of the keyword length array 
F TRUEKEYS,8 ; Number of help keys 
f HELPLEVEL.B ; Current key depth 
F ; Flags 
L ‘ee 
P 
V » 
INIT ; Printing initiated 
ALL ; Print all information found 
‘Neate 3; Keys successfully found 
E 


: Old format library information structure 


A wv 
= 
— 
2 
~ 
~ 
> 
a e 
*. 
@ cr 


SSTRUCT OFL 


MNTVBN 


L VBN of start of module name table 
MNTESIZ.L 


size of an entry (in pyyes) in MNT 
Number of modules in MNT 

Number of blocks in MNT 

Number of entries per block 
Address of MNT window block 

Size of MNT window block 

VBN of start of global symbol table 
Size of an onety in G 

Number of symbo 


Number of entries per block 
Address of GST window block 
Size of GST window block 


Sa Ions Iona Iona Ine Ions Be Bene Bens Bon one ae ia 


H | 
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F WINBVBN,L ; VBN of base of gucrent window 
F WINTVBN,L ; VBN of top of window 
fF WINBLKS,L ; Number of blocks in window 
; Do not change the order of ‘ENT’, 'RBN', ‘ADR’ | 
: TRILENT,L 3 Total table entry's number 
F TRILRBN,L ; within block and relative block 
; within window 
7 TRILADR,L ; Pointer to trial entry in table 
F LOWENT,L ; Lowest possible name entry 
é LOWRBN,L ; Relative block within window 
f LOWADR, ; and its address within table 
' HIENT, i Highest possible name entry 
F HIRBN,L ; Relative block number within window | 
f HIADR,L ; and its address within table 
L LENGT 
E | 


Data structure to extract information for either the GST or MNT 
of an old format Library 


SSTRUCT O18 


; VBN of start of index 

; Size of an entry in bytes 
; Number of entries in index 

; Number of blocks in index 

; Number of entries in a block 


2 
Sete Se Se Se Ge @ 


| 
| 
| 
| 
| 
| 
| 
; Address of window table in memory 
Size of window table 

| 

| 
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